First, run the chunk below to load all needed packages
The purpose of this r code is to easily find the time and value for Airpressure and AirTemperature and CO2 for each sample point of the wetland data set
#Step one: read in data for CO2
CO2Data <- read.csv(here::here("Wetlands/Wetland_CO2.csv"), skip=0, header = TRUE)
CO2Data <- CO2Data[,2:5]
colnames(CO2Data) <- c("Date","Time","DateTime","ppm_NOTcorrected")
CO2Data$DateTime <- as.POSIXct(CO2Data$DateTime, format="%Y-%m-%d %H:%M:%S", tz = "UTC")
CO2Data$Date <- as.Date(CO2Data$Date, format="%m/%d/%Y")
CO2Data$Time <- format(as.POSIXct(CO2Data$DateTime), format = "%H:%M:%S", tz = "UTC")
##Select time period when CO2 has reached a platua
#Step 1: select date
## No trace type specified:
## Based on info supplied, a 'scatter' trace seems appropriate.
## Read more about this trace type -> https://plotly.com/r/reference/#scatter
## No scatter mode specifed:
## Setting the mode to markers
## Read more about this attribute -> https://plotly.com/r/reference/#scatter-mode
#summariz
## mean
## 1 3998.708